home *** CD-ROM | disk | FTP | other *** search
/ Sounds Terrific 1 / Sounds Terrific CD (1994)(Weird Science)(Disc 2 of 2)[!][Amiga-PC].iso / modules / w / wmreply.mod < prev    next >
Encoding:
Text File  |  1994-08-04  |  3.2 KB  |  87 lines
  1. Wmaster #156 @5858
  2. 7Tuesday5, 3July 167, 31991  5 8:13 7pm 1<7EST1>
  3. 7[2Msg_Status7]: 2Reply Not Needed
  4. 7──────────────────────────────────────────────────────────────────────────
  5.  
  6. -------    ---------     --------------        --------------       ---
  7.   --------    --------    ---  Mod #16 from the Winds Master   -----   ----
  8.  -----   -----  ----------     The Whirlwind of Information      ----- ---
  9. -----   -------    -------     8 pm Friday to 6 am Monday,   -----    ----
  10.   -------     ------------     (Weekends ONLY!) 765-3093.  ------    -----
  11.  ----     -------    ------                                   ---------
  12.    --------    -------------   I can be reached at 93 @5851 ---------   ---
  13. -----    --------    ----  -------    ---------      ---------     ------
  14.  
  15. WMREPLY.MOD
  16.  
  17.   Ok, there are a lot of reply mods out there, and this is actually just
  18. a changed version of one of them (sorry, I don't know which one).  The only
  19. code left is the addline's.
  20.  
  21.   The difference between this mod and all the others is simple, it gives 
  22. the users the option to not add anything.  It doesn't give the Part option
  23. that I have seen, 'cause I really didn't like it.. but you can add it if 
  24. you want.  The option that it does give you is D:on't say.  This doesn't 
  25. add anything to the message.  I like this for my mods and ansi pictures.
  26.  
  27. ON WITH THE MOD!
  28.  
  29. key- 
  30.  
  31. =  existing code
  32. +  added line
  33. !  changed line
  34. ?  other mod.. optional
  35.  
  36.  
  37. make the following change to the var declarations in inmsg:
  38.  
  39.  
  40. = void inmsg(messagerec *m1, char *title /* was more here.. don't change */
  41. = {
  42. =   char s[LEN],s1[LEN],s2[LEN],ro[81],fnx[81],chx,*ss,*ss1;
  43. +   char c;                        /* REPLY */
  44. =   int maxli,curli,done,save,savel,i,i1 /* was more here.. don't change */
  45. =   int email;        /* email? 1 if yes, 0 if no */
  46.  
  47.  
  48. make these changes to the same function.  (the ? lines can be added, but 
  49. are optional).
  50.  
  51. =    if (irt[0]) {
  52. ?      strcpy(s,"\x03""7RE: \x03""1"); /* colors RE: same as MS: */
  53. =      strcat(s,irt);
  54. =      addline(b,s,&l1);
  55. =      addline(b,"",&l1);
  56. =      irt[0]=0;
  57. =    }
  58. =
  59. +    prt(2, "Replies:  Y:es, N:o, D:on't say    : ");            /* REPLY */
  60. +    c=onek("YND");                            /* REPLY */
  61. +    switch (c)                                                 /* REPLY */
  62. +    {                                                          /* REPLY */
  63. +      case 'Y':                                                /* REPLY */
  64. +    addline(b,"\x03""7MS:\x03""1 Reply Wanted",&l1);        /* REPLY */
  65. +    break;                                                  /* REPLY */
  66. +      case 'N':                                                /* REPLY */
  67. +    addline(b,"\x03""7MS:\x03""1 Reply not needed",&l1);    /* REPLY */
  68. +      case 'D':                                                /* REPLY */
  69. +    break;                                                  /* REPLY */
  70. +    }                                                          /* REPLY */
  71. +                                /* REPLY */
  72. +    if (c!='D') addline(b,"",&l1);                      /* REPLY */
  73. =
  74. ?    pl("Saving...");          /* I moved Saving... so it looks better */            
  75. =
  76. =    if (fsed) {
  77. =      ll=filelength(i5);
  78.  
  79.  
  80.  
  81. I think that's it..  
  82.  
  83.                         Winds Master
  84.  
  85.  
  86.  
  87.